home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
EnigmA Amiga Run 1996 February
/
EnigmA AMIGA RUN 04 (1996)(G.R. Edizioni)(IT)[!][issue 1996-02][Skylink CD III].iso
/
earcd
/
ear
/
fraphix1.lha
/
Fraphix_Installer
< prev
next >
Wrap
Text File
|
1995-11-29
|
2KB
|
98 lines
; Script di controllo per l'installazione Fraphix
; Definizione delle frasi di uso comune!!!
(set nomedisco "Distribuito_EAR:"
)
(set frase1
(cat "In quale directory preferisci INSTALLARE il programma"
"FraphiX V1.0 (Shareware)")
)
(set frase4
(cat "Seleziona quale directory deve "
"divenire la zona di transito dei dati "
"per il programma \"FraphiX V1.0 (SHAREWARE)\"")
)
; Script vero e proprio
(set nome-dir
(askdir
(prompt frase1)
(help @askdir-help)
(default "Work:")
)
)
(set frase3
(cat "\n\nAttendere!\n\nSto copiando tutti i files "
"necessari nella directory \""
"Fraphix\""
)
)
(set frase2
(cat "Attendere!\nSto creando la directory \""
nome-dir
"Fraphix\""
)
)
;-------------------
; Copia LHEX to RAM: per velocizzare
(set sorgente
(cat nomedisco "c/")
)
(copyfiles
(prompt "")
(help "")
(source sorgente)
(dest "RAM:")
(choices "lhex")
)
(set sorgente (cat nomedisco "libs/"))
(if (= 0 (exists "Sys:Libs/amos.library"))
(copyfiles
(prompt "")
(help @copylib-help)
(source sorgente)
(dest "Sys:LIBS")
(choices "amos.library")
)
)
(working "Istallando il programma...")
(run ("RAM:lhex >CON:0/0//60/lhex/AUTO -a -f \"-w=%s\" x %sFraphix.lha" nome-dir nomedisco))
(run ('%sc/Cambiastringa \"%sFRAPHIX/Modulo_Registrazione\" @#§ EAR' nomedisco nome-dir))
; Seleziona dove posizionare la zona di transito dei dati!
(set nome (cat nome-dir "Fraphix"))
(set store-dir
(askdir
(prompt frase4)
(help @askdir-help)
(default nome)
)
)
(set comando
(cat "assign Fraphix_Store: "
store-dir
"\n")
)
(set frase5
(cat
"\n\nATTENZIONE!\n\nAggiungo alcune informazioni vitali "
"al file \"S:User-Startup\"\n")
)
(startup "FraphiX"
(prompt frase5)
(help "SPIACENTE!\n\nNessuna spiegazione!!!")
(command comando)
)